(defstruct Point :x :y :z)

(defstruct Vert :id :meshId :point)
(defstruct Edge :id :meshId :pair :prev :next :vert :face)
(defstruct Face :id :edge)

